home *** CD-ROM | disk | FTP | other *** search
/ Hottest 6 / Hottest 6 (1996)(PDSoft)[!].iso / software / videoutils / a-g / ami2d / macros / opt2d.rexx < prev    next >
OS/2 REXX Batch file  |  1978-11-24  |  384b  |  18 lines
  1. /* macro to equivilence current model */
  2. options results
  3.  
  4. address ami2d
  5.  
  6. result = Request(,,"Select starting element",,"OKAY","CANCEL","AMI2D")
  7. if result = '' then exit
  8. 'info(elem)'
  9. parse var result nd id junk
  10. if id < 1 then id = 1
  11. 'clear'
  12. 'save(ram:temp.dat)'
  13. address command 'ami2d:bin/opt2d ram:temp.dat -n'nd
  14. 'read(ram:temp.dat)'
  15. 'plot'
  16. address command 'delete ram:temp.dat'
  17. exit
  18.